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mem_allocate (d, i, j, k) begin 
if (d > k) begin 

D(i,j) = 0 

return (addr(i, j)) 
end 
k=k/2 

if (d <= D(i+k, j+k) and 

(d > D(i+k, j-k) or D(i+k, j-k) >= D(i+k, j+k)) and 
(d > D(i-k, j+k) or D(i-k, j+k) >= D(i+k, j+k)) and 
(d > D(i-k, j-k) or D(i-k, j-k) >= D(i+k, j+k))) 
a = mem_allocate( d, i+k, j+k, k) 
else if (d <= D(i+k, j-k) and 

(d > D(i-k, j+k) or D(i-k, j+k) >= D(i+k, j-k)) and 
(d > D(i-k, j-k) or D(i-k, j-k) >= D(i+k, j-k))) 
a = mem_allocate ( d, i+k, j-k, k) 
else if ( d <=D(i-k, j+k) and 

(d > D(i-k, j-k) or D(i-k, j-k) >= D(i-k, j+k))) 
a = mem_allocate( d, i-k, j+k, k) 
else 

a = mem_allocate( d, i-k, j-k, k) 
D(i, j) = max( D(i+k, j+k), D(i+k, j-k), D(i-k, j+k), D(i-k, j-k)) 
return ( a ) 
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memfree ( i, j, k ) begin 
D(i,j) = 2*k 

while ( k < MEMSIZE/2 ) begin 
k = k*2 

D(i, j) = max( D(i+k, j+k), D(i+k, j-k), D(i-k, j+k), D(i-k, j-k)) 
end 
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addressgenerator ( ) begin 
m = 0 
n = 0 

input ( frame, x, y, xsize, ysize) 
while (n < ysize) begin 

x = xaddr + m ■ 

y = yaddr + n 

block_addr = LUT { frame, y[ :7 ], x[ :7 ] } 
ysuboffset = y[6:4] 
xsuboffset = x[6:4] 

addr = { blockaddr, y suboffset, xsuboffset } 
y_offset = y[3:0] 
x__offset = x[3:0] 
output (addr, y offset, x offset) 
m = m-f 16 
if ( m >= xsize ) begin 
n = n+ 16 
m = 0 
end 
end 
return 
end 

data merge ( ) begin 
input ( x_size, y_size, x_offset, y_offset) 
n = 0 



while ( n < y size ) begin 
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while ( i < 16 ) begin 
m = 0 

while ( m < (x_offset + x_size) ) begin 
j=0 

while (j < 16) begin 
input ( block_data ) 
B[i][m] =block_data 
m = m+ 1 

j-j+i 

end 
end 

i-i+1 
end 

if ( y_offset > 0 ) begin 

i = y_offset 

y_offset = 0 
else 

i = 0 
end 

while ( i < 16 and n < ysize) begin 
while ( j < x_size ) begin 
data = B[i][j + x_offset] 
output ( data ) 

j=j+i 

end 

i = i+l 
n = n+ 1 
end 
end 
end 
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